
		**********************************************************
		** File: EBA pdest 1-15.do								**
		** Paper: Human Trafficking Indicators: A New Dataset	**
		** Author: Richard Frank								**
		** Date: July 11, 2021									**
		** Task: Running first series of pdest EBA models		**
 		**********************************************************

				clear
				version 16.1
				set max_memory 32g, permanently
				set seed 1234
				set level 95 		
				 cd "C:\Users\Administrator\Desktop\"
				use "HT EBA merged DV and IVs.dta"
	
 ***************
 ** 1. agr_employment **
 ***************
		
		probit F.pdest /**/ agr_employment /**/
		regsave using /**/ eba_pdest_1 /**/, replace
		
		tuples 																///
		 /**/ america_l america_n conflict_external conflict_internal		///
		 cpi easia_pacific energyuse ethnic_tension	ethnic					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british	 				///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 	///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit F.pdest /**/ agr_employment /**/ `tuple`i'' gdppcl, robust cluster(ccode)
		regsave using /**/ eba_pdest_1 /**/, tstat pval ci autoid append detail(all) 	
						}	
	
 **********************
 ** 2. america_l **
 **********************
		
		probit F.pdest  /**/ america_l /**/
		regsave using /**/ eba_pdest_2 /**/, replace
		
		tuples 																///
		 agr /**/ america_n conflict_ext conflict_int 						///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 		///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.pdest /**/ america_l /**/ `tuple`i'' gdppcl , robust cluster(ccode)
				regsave using /**/ eba_pdest_2 /**/, tstat pval ci autoid append detail(all) 	
						}
	
 **********************
 ** 3. america_n **
 **********************
		
		probit F.pdest  /**/ america_n /**/
		regsave using /**/ eba_pdest_3 /**/, replace
		
		tuples 																///
		 agr america_l /**/ conflict_ext conflict_int						///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 	///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.pdest /**/ america_n /**/`tuple`i'' gdppcl, robust cluster(ccode)
				regsave using /**/ eba_pdest_3 /**/, tstat pval ci autoid append detail(all) 	
						}
						
 **********************
 ** 4. conflict_ext **
 **********************
		
		probit F.pdest  /**/ conflict_ext /**/
		regsave using /**/ eba_pdest_4 /**/, replace
		
		tuples 																///
		 agr america_l america_n /**/  conflict_int							///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
				forvalues i = 1/`ntuples'   {
				   probit F.pdest /**/ conflict_ext /**/`tuple`i'' gdppcl, robust cluster(ccode)
				regsave using /**/ eba_pdest_4 /**/, tstat pval ci autoid append detail(all) 	
						}

 **********************
 ** 5. conflict_int **
 **********************
		
		probit F.pdest  /**/ conflict_int /**/
		regsave using /**/ eba_pdest_5 /**/, replace
		
		tuples 																///
		 agr america_l america_n  conflict_ext /**/  						///
		 cpi easia_pacific energyuse ethnic_tension ethnic 					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 								///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 											///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
			forvalues i = 1/`ntuples'   {
		    probit F.pdest /**/ conflict_int /**/`tuple`i'' gdppcl, robust cluster(ccode)
			regsave using /**/ eba_pdest_5 /**/, tstat pval ci autoid append detail(all) 	
						}

  
 ***************
 ** 6. cpi **
 ***************
		
		probit  F.pdest  /**/ cpi /**/
		regsave using /**/ eba_pdest_6 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 /**/  easia_pacific energyuse ethnic_tension ethnic 				///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 	///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ cpi /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_6 /**/, tstat pval ci autoid append detail(all) 	
						}	
 ***************
 ** 7. easia_pacific **
 ***************
		
		probit  F.pdest  /**/ easia_pacific /**/
		regsave using /**/ eba_pdest_7 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi /**/  energyuse ethnic_tension ethnic 							///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ easia_pacific /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_7 /**/, tstat pval ci autoid append detail(all) 	
						}	
	
						
 ***************
 ** 8. energyuse **
 ***************
		
		probit  F.pdest  /**/ energyuse /**/
		regsave using /**/ eba_pdest_8 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific /**/ ethnic_tension ethnic 						///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ energyuse /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_8 /**/, tstat pval ci autoid append detail(all) 	
						}	
						
						
 ***************
 ** 9. ethnic_tension **
 ***************
		
		probit  F.pdest  /**/ ethnic_tension /**/
		regsave using /**/ eba_pdest_9 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse /**/  ethnic 						    ///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ ethnic_tension /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_9 /**/, tstat pval ci autoid append detail(all) 	
						}	
						
	 				
 ***************
 ** 10. ethnic **
 ***************
		
		probit  F.pdest  /**/ ethnic /**/
		regsave using /**/ eba_pdest_10 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension /**/   					///
		 europe execleft execright fdi food 								///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ ethnic /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_10 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
						
	 				
 ***************
 ** 11. europe **
 ***************
		
		probit  F.pdest  /**/ europe /**/
		regsave using /**/ eba_pdest_11 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension ethnic  				///
		 /**/  execleft execright fdi food 									///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ europe /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_11 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
									
 ***************
 ** 12. execleft **
 ***************
		
		probit  F.pdest  /**/ execleft /**/
		regsave using /**/ eba_pdest_12 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension ethnic  				///
		 europe /**/   execright fdi food 								    ///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ execleft /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_12 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 13. execright **
 ***************
		
		probit  F.pdest  /**/ execright /**/
		regsave using /**/ eba_pdest_13 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension ethnic  				///
		 europe execleft /**/   fdi food 								    ///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ execright /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_13 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 14. fdi **
 ***************
		
		probit  F.pdest  /**/ fdi /**/
		regsave using /**/ eba_pdest_14 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension ethnic  				///
		 europe execleft execright /**/    food 							///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ fdi /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_14 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 ***************
 ** 15. food **
 ***************
		
		probit  F.pdest  /**/ food /**/
		regsave using /**/ eba_pdest_15 /**/, replace
		
		tuples 																///
		  agr america_l america_n conflict_ext conflict_int 				///
		 cpi easia_pacific energyuse ethnic_tension ethnic  				///
		 europe execleft execright fdi /**/     							///
		 homicides infant KOFSoGI language legal_british 					///
		 legal_french legal_german legal_scan literacy 						///
		 lp_catho80 lp_protmg80 media mena migration 						///
		 mortality_under5 lp_muslim80 oecd peacekeepersfl peacekeepersl 				///
		 polity2 pop prevent prostitutionlaw protect 						///
		 pve refugees religion rle sasia 									///
		 ssa tourism trade unemployment urban 								///
		 vae visa wecon  english 										///
		 french german spanish portuguese landlocked 						///	
				, max(3) min(3)  kronecker
		
		forvalues i = 1/`ntuples'   {
		 probit  F.pdest  /**/ food /**/ `tuple`i'' gdppcl, robust cluster(ccode) 
		regsave using /**/ eba_pdest_15 /**/, tstat pval ci autoid append detail(all) 	
						}							
												
 	
			
			
			
			
			
			
			
			
			
			
			
			
